;Object Pascal adicional Syntax highlight Script for Twistpad
;1998 - 2006 (C) Carthago Software

[::Header::]
SyntaxName=Object Pascal
Extensions=pas;dpr;ops;~pas;inc
Functions=(?i)^procedure|(?i)^function|TODO :|(?i)^constructor|(?i)^destructor
;Spell nothing
Spelling=0
;Except when a word is in this Contexts:
SpellingContexts=1;2

;****************** Comments ************************
[Comment1]
Type=StartStop
Context=1
Priority=10
Scope=0
WholeWordOnly=0
First={
Last=}
Background=Default
Foreground=008000
italic=1
Outline=1

[Comment2]
Type=StartStop
Context=1
Scope=0
Priority=10
WholeWordOnly=0
First=//
Last=
Background=Default
Foreground=008000
italic=1

[Comment3]
Type=StartStop
Context=1
Scope=0
Priority=10
WholeWordOnly=0
First=(*
Last=*)
Background=Default
Foreground=008000
italic=1
Outline=1

;****************** End Comments ************************

[Quote]
Type=StartStop
Context=2
Scope=0
Priority=10
WholeWordOnly=0
First='
Last='
Background=Default
Foreground=408080

[ASM]
Type=StartStop
Context=3
Scope=0
Priority=9
WholeWordOnly=1
First=asm
Last=end
Background=Default
Foreground=5B5B5B
Outline=1

[BE1]
Type=StartStop
Context=6
Priority=5
Scope=0
WholeWordOnly=1
First=begin
Last=End
Background=default
Foreground=default
italic=0
Outline=1
smart=1

[BE2]
Type=StartStop
Context=6
Priority=5
Scope=0
WholeWordOnly=1
First=case
Last=End
Background=default
Foreground=default
italic=0
Outline=1
smart=1

[BE3]
Type=StartStop
Context=6
Priority=5
Scope=0
WholeWordOnly=1
First=Try
Last=End
Background=default
Foreground=default
italic=0
Outline=1
smart=1

[BE5]
Type=StartStop
Context=0
Priority=4
Scope=0
WholeWordOnly=1
First=unit
Last=end.
Background=default
Foreground=default
italic=0
Outline=1
smart=0

[Pascal Keyword]
Type=keyword
Context=101
Scope=0
Priority=6
WholeWordOnly=1
Keyword1=
Keyword2=do;if;of;to;or;begin;end
Keyword3=for;new;nil;set;var;try;on;raise;not;and
Keyword4=byte;case;char;else;exit;file;goto;halt;real;then;type;unit;uses;with;word
Keyword5=array;class;const;label;until;while;finally;read;write
Keyword6=downto;inline;object;public;record;repeat;string;except
Keyword7=boolean;integer;longint;pointer;private;program
Keyword8=function;shortint;property;override;exports
Keyword9=interface;otherwise;procedure;protected;published;inherited
Keyword10=destructor;initialization;library;external;mod;packed
Keyword11=constructor;finalization;virtual;abstract
Keyword12=
Keyword13=
Keyword14=implementation
Keyword15=
Keyword16=
Background=Default
Foreground=0000FF
Bold=0

[Assembler Registers]
Type=keyword
Context=102
Scope=3
Priority=9
WholeWordOnly=1
Keyword1=EAX;EBX;ECX;EDX;ESI;EDI;EBP;ESP;EIP;FS;GS;AX;AL;AH;BX;BL;BH;CX;CL;CH;DX;DL;DH;ES;DS;CS;SP;SS;BP;IP;SI;DI
Keyword2=
Keyword3=
Keyword4=
Keyword5=
Keyword6=
Keyword7=
Keyword8=
Keyword9=
Keyword10=
Keyword11=
Keyword12=
Keyword13=
Keyword14=
Keyword15=
Keyword16=
Background=Default
Foreground=FF8000
